respq
include
falsej
screen
screen.width
CNTNU
KCNTNU
OBackToMenu
SPROMPT
MAX.MSG.LENy
BLINK
OutfilPromptw
DefScrAddr
HelpFileNum
RepFileNum
ParmFileNumC
TmpInFil
	TmpOutFilC
XorCntnuN
In.Key
GOODBYE
THENGOTO
END.PROG7
prompt
GetDbl
DefVal
Lngth
lo.lim
hi.lim
helpkey 
DiamPrompt
DefDiam
InputU
Input.Stringc
ret.data
max.lend
def.data
GetInt
NumChRings
CRPromptN
i.lim{
SpPrompt
NumSprockets
OutFil
IGNOR
UCLTR
LCLTRl
DIGIT
SPACEt
CTLC<
CTLRZ
CTLU&
CTLZ-
CTL.END
UPAROE
DNARO
LFARO
RTARO]
norfor
norbak
norbrdrR
hifor
hibak
altfor
altbak
altbrdr#
atnfor#
atnbak
ProgName
BusName
Address1
Address2p
State
nofor
NumCRTeethN
NumSpTeeth
	CRTPrompt
CRTrow
SpTrow0
	SpTPrompt
ColLoc
Cadence
InPerRev
NumCadences
Cadnce
OCNTNU
	Conductor@
FileSpecMode
MusFileDir
Editor
 Program to generate statistics for a bicycle
 Programmed by Constantine Roussos - July, 1988
m:sysconst.bas'
Press <RETURN> to continue. 
Press any key to continue. "
Press any other key to continue. "
Press any other key to return to menu.
Enter choice. 
Enter name of output file 
m:parmcomn.bas'
Press X to exit - any other key to continue.
Enter diameter of wheel.
Enter number of Chain Rings (front gears).
Enter number of sprockets (rear gears)."
BICYCLE INFORMATION PROGRAM - Programmed by Constantine Roussos"
  -  July, 1988"
This program will generate information about your bicycle"
from information you will input.  You will need to know"
the number of teeth in each of your chain rings and sprockets"
and the diameter of your wheels.
CHRINGS"
SPROCKETS"
Enter number of teeth in chain ring #"
CRTEETH"
Enter number of teeth in sprocket #"
CRTEETH"
CON"e
OutFil7
MULTI-SPEED BICYCLE INFORMATION GENERATOR"
Wheel Diameter = ##"
Number of Chain Rings = #"
Number of Sprockets = #"
Chain Ring
Number of Teeth"
Sprocket
Number of Teeth"
GEAR RATIO
Sprocket
Chain Ring
#.###"
GEAR INCHES"
Sprocket
Chain Ring
###.##
INCHES TRAVELLED PER REVOLUTION"
Sprocket
Chain Ring
###.#"
MILES PER HOUR AT A CADENCE OF
Sprocket
Chain Ring
###.##
Thanks for using BIKEINFO"